(x_screen_planes): Fix type of argument.

diff --git a/src/xfns.c b/src/xfns.c
index cf187e5ff01a2f4b9100d46303a505d6dbe8275b..e11fbcf52c8b50cccca4b994b3c8c4032759c7fb 100644 (file)
--- a/src/xfns.c
+++ b/src/xfns.c
@@ -4033,10 +4033,10 @@ x_char_height (f)
 }
 
 int
-x_screen_planes (frame)
-     Lisp_Object frame;
+x_screen_planes (f)
+     register struct frame *f;
 {
-  return FRAME_X_DISPLAY_INFO (XFRAME (frame))->n_planes;
+  return FRAME_X_DISPLAY_INFO (f)->n_planes;
 }
 \f
 #if 0  /* These no longer seem like the right way to do things.  */